約 2,604,129 件
https://w.atwiki.jp/ntemacs/pages/42.html
■ Windows版 Emacs 共通の設定 【お知らせ】 2017/05/25 追記 Language Server Protocol client for Emacs というのもあるようです。 https //github.com/emacs-lsp/ 2017/04/05 追記 OmniSharp も面白そうです。 http //qiita.com/haripo/items/bbe2b91b83bf3c71dac8 2015/05/19 追記 Cygwin版 Emacs に対応しました。設定を MinGW版 Emacs と Cygwin版 Emacs で共有できるようにするため、パスの指定方法を cygpathコマンド で言うところの unix形式 に統一しています。MinGW版 Emacs を利用する場合、Cygwin の導入、cygdriveプレフィクス の / 設定、cygwin-mount.el のインストールが行われていれば(gnupack-11.00 の標準設定)、うまく動くと思います。(もしうまく動かない場合には、パスを mixed形式(c /foo/bar のような形式) に変更してみてください。) 2015/05/18 追記 Eclipse に pleiades をインストールする場合に eclimd が起動しない対策をアドバイスを用いて対応しました。 (この対応により、eclipse.ini の修正は不要となりました。) 【本題】 emacs-eclim を使うための設定です。 1) Eclipse、JDK をインストールする。 2015/5/18 時点で最新の eclim は、v2.4.1です。 http //eclim.org このeclim を利用するには、Eclipse 4.4.x(Luna) と JDK 1.7 以上が必要です。 http //eclim.org/install.html 必要に応じて、pleiades もインストールしてください。 2) eclim をインストールする。 次のコマンドでインストールできます。途中、vimfiles のディレクトリがないと怒られますが、"作らない"(いいえ)を選択し、「Do not install vim files (emacs users only)」にチェックを入れ、進んでください。 java -jar eclim_2.4.1.jar http //eclim.org/install.html#installing-upgrading 3) emacs-eclim、auto-complete をインストールする。 melpa からインストールしてください。 4) emacs-eclim の設定をする。 https //github.com/senny/emacs-eclim 上記のページを参考にしながら、以下のような設定を行ってください。eclim-executable の変数の設定では、コメントに書いているとおり、ドライブの指定方法に留意してください。 また、Eclipse のインストールパスと workspace のディフォルトパスは適宜変更してください。 (require cl-lib) (require eclim) (global-eclim-mode) (require eclimd) (custom-set-variables (eclim-eclipse-dirs ("/c/opt/eclipse")) ;; MinGW版 Emacs の場合、「c /」を使った表記とすると eclim--call-process から ;; 呼ばれる shell-command-to-string が正常に動作しない。 ;; (shell-quote-argument で追加されたエスケープ文字をうまく処理できないようだ。) ;; 理由は分らないが、「c /」の前にスペースを入れるか、unixタイプのパスとすると ;; 動作することを確認している。 ;; × (eclim-executable "c /usr/local/eclipse_4.4/eclim.bat") (eclim-executable "/c/opt/eclipse/eclim.bat") (eclimd-executable "/c/opt/eclipse/eclimd.bat") (eclimd-default-workspace "/c/home/workspace") ;; eclimd の起動が完了するのを待たない(*eclimd* バッファで起動の状況を確認できます) (eclimd-wait-for-process nil)) ;; Eclipse に pleiades をインストールしている場合に eclimd が起動しないことの対策 (advice-add start-eclimd around (lambda (orig-fun rest args) (let ((default-directory (file-name-directory (expand-file-name eclimd-executable)))) (apply orig-fun args)))) ;; executable-find によるチェックにより、eclimd が起動できない場合の対策 (advice-add start-eclimd around (lambda (orig-fun rest args) (cl-letf (((symbol-function executable-find) (symbol-function identity))) (apply orig-fun args)))) ;; Workspace directory を windows形式のパス に変換する (advice-add start-eclimd before (lambda (orig-fun rest args) (interactive (list (read-directory-name "Workspace directory " eclimd-default-workspace nil t))) (setf (nth 0 args) (if (fboundp cygwin-convert-file-name-to-windows) (cygwin-convert-file-name-to-windows (expand-file-name (nth 0 args))) (expand-file-name (nth 0 args)))))) (when (eq os-type cygwin) ;; 作成するコマンドにファイルのパスが含まれていれば、mixed形式 のパスに変換する (advice-add eclim--make-command around (lambda (orig-fun rest args) (cl-letf (((symbol-function shell-quote-argument-original) (symbol-function shell-quote-argument)) ((symbol-function shell-quote-argument) (lambda (argument) (shell-quote-argument-original (replace-regexp-in-string "^/\\([a-zA-Z]\\)/" "\\1 /" argument))))) (apply orig-fun args))))) ;; auto-complete の設定を行う ;; http //dev.ariel-networks.com/wp/documents/aritcles/emacs/part9 ;; http //cx4a.org/software/auto-complete/manual.ja.html (require auto-complete-config) (ac-config-default) ;; emacs-eclim source の追加を行う (require ac-emacs-eclim-source) (ac-emacs-eclim-config) ;; 補完を自動的に開始しない (setq ac-auto-start nil) ;; TABキーで補完を開始する(TABキーをコンテキストに応じて補完用のキーにする) (ac-set-trigger-key "TAB") ;; 次候補、前候補を選択するキーを設定する (define-key ac-complete-mode-map (kbd "C-n") ac-next) (define-key ac-complete-mode-map (kbd "C-p") ac-previous) ;; デバッグメッセージを表示する ;; (eclim-toggle-print-debug-messages) ;; java-mode で eclim-mode を有効にする (add-hook java-mode-hook eclim-mode) 5) eclimd を起動する。 M-x start-eclimd で起動してください。 正常に起動したかは、別途開く DOS窓 で確認してください。 なお、Windows から eclimd.bat をダブルクリックすることでも起動可能ですが、この場合、パラメータとして workspaceパスを渡すことができません。 次のページの「For Windows」で始まる行以降にこの対策方法が載っていますので、eclimd.bat を直接起動させたい方は参考としてください。 http //eclim.org/faq.html 6) NTEmacsを立ち上げ、eclim-emacs を起動する。 M-x eclim-project-mode 7) Eclipse のプロジェクトを選択し、編集するソースファイルを開く。 8) eclim で始まるいろいろなコマンドを試す。 helm の場合、C-c C-e C-h でコマンドの一覧を確認できます。 9) eclimd を停止する。 M-x stop-eclimd で停止してください。DOS窓 の×で停止すると、Javaエラーとなります。 なお、M-x start-eclimd を使わずに Eclipse を GUI で立ち上げ、eclimd を起動する方法があります。 この場合は、5) の代わりに Eclipse を立ち上げ、メニューから以下を辿って eclimd を起動してください。起動は初回のみで OK です。 日本語メニューの場合) ウインドウ ビューの表示 その他 Eclim eclimd 英語メニューの場合) Window Show View Other Eclim eclimd また、eclimd を外部の DOS窓 を開かずに、Emacs のバッファ内で起動する方法があります。 ちょっとトリッキーな設定が必要となりますが、興味のある方は以下を参考にして試してみてください。 1) eclimd-executable の設定を次のとおりに変更する。 (custom-set-variables (eclimd-executable "/c/opt/eclipse/eclimd.sh")) Eclipse のインストールパスは適宜変更してください。 2) Eclipse のインストールディレクトリ(eclim.bat がある場所)に次のスクリプトを eclimd.sh として格納する。 eclimd.sh #!/bin/sh # -*- coding utf-8-unix -*- export SHELLOPTS set -o igncr function pwd() { cygpath -m `/bin/pwd`; } export -f pwd `dirname $0`/plugins/org.eclim_2.4.1/bin/eclimd "$@" 3) eclimd を起動する。 M-x start-eclimd で起動してください。 正常に起動したかは、*eclimd* バッファを確認することでわかります。 こちらの環境では次のページに書かれている問題が発生したので、「%JAVA_HOME%\bin」をPathの一番最初に移動しました。 http //d.hatena.ne.jp/happynow/20120521/1337599059 4) eclimd を停止する。 M-x stop-eclimd で停止してください。 変更履歴 2014/09/26 このページを作成した。 2014/09/27 start-eclimd と stop-eclimd を動かすための設定を追加した。 2014/09/29 eclimd を eclimd.bat で起動した際の停止方法を追記した。 2014/09/29 eclimd-wait-for-process の設定を追加した。 2014/09/30 eclimd.sh のスクリプト内容の見直しを行った。 2014/09/30 eclim-executable の設定内容を変更した。(「/c/」から始まる文字列を、最初にスペースの入った「 c /」の文字列で始まるようにした。) 2014/10/01 eclimd.bat の起動方法を変更した。また、eclimd.sh の内容を修正した。 2015.05.18 Eclipse に pleiades をインストールする場合に eclimd が起動しない対策をアドバイスを用いて対応しました。(eclipse.ini の修正は不要となりました。) 2015.05.19 Cygwin版 Emacs に対応した。 2015/09/13 advice を Emacs-24.4 以降の書式に見直した。
https://w.atwiki.jp/biboroku2007/pages/10.html
Coffeecup Editor (Linux 上では最良の PHP 用 IDE) PHP エディタ (英語) HTML/PHP エディタ Quanta (英語) HTML/PHP エディタ Blue Fish (英語) Megsonia PHPどうやって開発してる?という基本的な問題を今更悩み、一通り使ってみて一段落したので大まかにまとめてみた。 Type A 開発環境:秀丸(PHPエディタもしくは同等のフリーのエディタ) テスト環境:Windows Type B 開発環境:Eclipse(もしくはZendStudio) テスト環境:Windows Type C 開発環境:vi(vim, nvi, elvis) テスト環境:UNIX Type D 開発環境:emacs php-mode テスト環境:UNIX http //bluestar.s32.xrea.com/text/php-mode.php emacs php-mode http //p0t.jp/mt/archives/2005/12/phpmode.html emacs php-mode http //www.ofug.net/~hachiman/wiliki/wiliki.cgi?php-mode emacs php-mode http //blog.koshigoe.jp/archives/2006/08/emacs_3.html emacs php-mode http //www.kiske.info/blog/archives/2006/05/emacs.html http //www.magic.mediawars.ne.jp/tips/emacs_key.html emacsコマンド一覧 tar xzf php-mode-1.2.0.tgz
https://w.atwiki.jp/bokuyo/pages/174.html
Emacs 環境設定 「Visual C++ で書いてるの?ぷぷー、プログラマだったらEmacs 使うよねー」と小指が異常に発達した方に指摘されたので、これからはEmacs とともに生きていきたいと思います。 ぼくのバージョンはGNU Emacs 22.3.1 です。 やばい、unix わかんない!! Emacs C-x C-f ファイルを開く, 新規作成 .emacs ターミナルから.emacs.d ディレクトリがあるか確認 cd /Users/ ls -a
https://w.atwiki.jp/damedev/pages/12.html
トップページ サーバー emacsを入れる 目次 目次 方法 方法 cd ~/ mkdir -p src/Emacs mkdir usr cd src/Emacs cvs -d pserver anonymous@cvs.sv.gnu.org /sources/emacs login CVS password (単に RETURN) cvs -d pserver anonymous@cvs.sv.gnu.org /sources/emacs co emacs setenv LANG C setenv L_ALL C cd emacs ./configure --without-carbon --without-x --prefix=/home/※USERNAME※/usr make bootstrap make install
https://w.atwiki.jp/oxon/pages/20.html
Carbon Emacs Last Updated 2006-12-14
https://w.atwiki.jp/nkym_memo/pages/29.html
;; .emacs ;; ;; Last Updated 2010/11/16 Tue 08 26 57 ;; ;;auto-install.elのインストール手順 ;; $mkdir -p ~/.emacs.d/auto-install ;; cd ~/.emacs.d/auto-install ;; wget http //www.emacswiki.org/emacs/download/auto-install.el ;; emacs --batch -Q -f batch-byte-compile auto-install.el ;;;Emacs Lispインストーラを利用 (add-to-list 'load-path "~/.emacs.d/auto-install") ;;(install-elisp-from-emacswiki "auto-install.el") (require 'auto-install) ;;起動時にEmacswikiのページを補完候補に加える (auto-install-update-emacswiki-package-name t) ;;install-elisp.el互換モード (auto-install-compatibility-setup) ;;ediff関連のバッファを一つのフレームにまとめる (setq ediff-window-setup-function 'ediff-setup-windows-plain) ;;スタートアップを非表示 (setq inhibit-startup-screen -1) ;;ツールバーを非表示 (tool-bar-mode -1) ;メニューバーを非表示 (menu-bar-mode -1) ;; 現在行に色をつける (global-hl-line-mode 1) ;; 履歴を次回Emacs起動時にも保存する (savehist-mode 1) ;;; 対応する括弧を光らせる (show-paren-mode 1) ;;; カーソルの位置が何文字目かを表示する (column-number-mode t) ;;; バックアップファイルを作らない (setq backup-inhibited t) ;;;Xでのクリップボードを共有 (setq x-select-enable-clipboard t) ;;;yes-or-noをy-or-nに省略 (defalias 'yes-or-no-p 'y-or-n-p) ;;; emacsclient ;; ファイルを現在のemacsで開く (server-start) ;; キーバインドの変更 ;;指定の行に移る (global-set-key "\M-g" 'goto-line) ;; 行の先頭でC-kを一回押すだけで行全体を消去する (setq kill-whole-line t) ;; undo (global-set-key "\C-z" 'undo) ;;動的略語展開 (global-set-key [?\C-;] 'dabbrev-expand) ;; ウィンドウの移動をM-tに (global-set-key "\M-t" 'other-window) ;;; C-hをBackSpaceに (global-set-key "\C-h" 'delete-backward-char) ;;; 初期フレームの設定 (setq initial-frame-alist (append '( (width . 47) ; フレーム幅(文字数) (height . 63)) ; フレーム高(文字数) initial-frame-alist)) ;;; 新規フレームのデフォルト設定 (setq default-frame-alist (append '((width . 47); フレーム幅(文字数) (height . 63)); フレーム高(文字数) default-frame-alist)) ;;; ファイル更新日を自動的に書き換える。 ;; ファイルの頭に "last updated "をつけくわえればよい (require 'time-stamp) ;; 日本語で日付を入れたくないのでlocaleをCにする (defun time-stamp-with-locale-c () (let ((system-time-locale "C")) (time-stamp) nil)) (if (not (memq 'time-stamp-with-locale-c write-file-hooks)) (add-hook 'write-file-hooks 'time-stamp-with-locale-c)) (setq time-stamp-active t) (setq time-stamp-start "Last Updated ") (setq time-stamp-format "%04y/%02m/%02d %3a %02H %02M %02S") (setq time-stamp-end " ") ;;;Last Updated の後に空白2つ以上いれると置換 ;;; タイトルバーにファイル名を表示する (setq frame-title-format (format "emacs@%s %%f" (system-name))) ;;;ファイルの自動挿入 (auto-insert-mode) ;;自動挿入するファイルのあるディレクトリ ;;最後の/は必須 (setq auto-insert-directory "~/.emacs.d/insert/") ;;自動挿入するファイル (define-auto-insert "\\.c" "c-template.c") ;;; viewer.el view-modeの設定 ;; M-x install-elisp-from-emacswiki viewer.el ;; ;; C-x C-rでview-modeでファイルを開く (setq view-read-only t) ;; 書き込み不能な場合はview-modeを抜けないように (require 'viewer) (viewer-stay-in-setup) ;; .log .out .datファイルをview-modeで開く (setq view-mode-by-default-regexp "\\.log") (setq view-mode-by-default-regexp "\\.out") (setq view-mode-by-default-regexp "\\.dat") ;;;view-mode時にモードラインに色をつける ;;色名を指定 (setq viewer-modeline-color-unwritable "tomato") (setq viewer-modeline-color-view "orange") (viewer-change-modeline-color-setup) ;;view-mode時のキーバインド (define-key view-mode-map "h" 'backward-char) (define-key view-mode-map "j" 'next-line) (define-key view-mode-map "k" 'previous-line) (define-key view-mode-map "l" 'forward-char) (define-key view-mode-map "J" 'View-scroll-line-forward) (define-key view-mode-map "K" 'View-scroll-line-backward) (define-key view-mode-map "b" 'scroll-down) (define-key view-mode-map " " 'scroll-up) ; view-modeを有効・無効にする ;;; 0.04秒以内に jk を同時押しでview-modeに移行 (require 'key-chord) (setq key-chord-two-keys-delay 0.04) (key-chord-mode 1) (key-chord-define-global "jk" 'view-mode) ;;; redo+.el (require 'redo+) (global-set-key "\M-z" 'redo) (setq undo-no-redo t); 過去のundoがredoされないようにする ;; 大量のundoに耐えられるようにする (setq undo-limit 600000) (setq undo-strong-limit 900000) ;;fullscreen.el (require 'fullscreen) ;;; recentf-ext.el ;; install-elisp-from-emacswiki recentf-ext.el (setq recentf-max-saved-items 3000) ;; 最近使ったファイルに加えないファイルを正規表現で指定する (setq recentf-exclude '("/TAGS$" "/var/tmp/")) (require 'recentf-ext) ;; f8をショートカットキーに (global-set-key [f8] 'recentf-open-files) ;;; auto-complete.el ;; install-elisp-from-emacswiki auto-complete.el ;(require 'auto-complete) ;(global-auto-complete-mode 1) ;;;col-highlight.el ;; auto-install-batch col-highlight.el ;(require 'col-highlight) ;(column-highlight-mode 1) ;;何もしないでいるとハイライトを始めるようにする場合 ;(toggle-highlight-column-when-idle 1) ;(col-highlight-set-interval 3)
https://w.atwiki.jp/kobapan/pages/21.html
Emacs-Lisp Emacs-Lisp/buffer-listからファイルとディレクトリの一覧をフルパスで取得 (2015-02-24 21 31 08) Emacs-Lisp/setとsetfとsetqの違い (2015-03-05 20 31 12) Emacs-Lisp/mapcarとmapc (2015-03-10 07 56 33) Emacs-Lisp/ファイルパス関連 (2015-03-14 20 26 14) Emacs-Lisp/kill-other-buffers (2015-03-14 23 50 32) Emacs-Lisp/*scratch* の永続化 (2015-03-14 23 52 05) Emacs-Lisp/現在行をハイライト (2015-03-23 18 21 08) Emacs-Lisp/lambda関数にクォートはいるのか (2015-03-25 17 10 12) Emacs-Lisp/mapcar*で引数に複数のリストを取る (2015-03-25 17 50 30) Emacs-Lisp/前回終了時のフレームサイズで起動する (2015-06-28 17 40 40) Emacs-Lisp/diredでファイルをOSアプリケーションで開く (2015-06-28 19 48 18) Emacs-Lisp/trim Emacs-Lisp/文字列から文字列を検索する Emacs-Lisp/シェル の PATH と alias を、eshell に引き継ぐ Emacs-Lisp/書き込み権限のないファイル・ディレクトリをsudoで開く、sudo.el Emacs-Lisp/今開いているファイルの関数一覧をさっと見るkokopelli.el Emacs-Lisp/簡易なプロジェクト管理bookmark-buffers.el Emacs-Lisp/ウィンドウ間の移動 Macro Emacs-Lisp/defgroup (2009-01-04 07 57 23) Emacs-Lisp/Common Keywords (2009-01-04 08 14 58) Emacs-Lisp/font-lock-add-keywords (2009-01-04 16 11 26) Emacs-Lisp/defface (2009-01-04 16 22 42) Emacs-Lisp/defconst (2009-01-04 17 57 18) Emacs-Lisp/font-lock-fontify-buffer (2009-01-04 18 09 08) Emacs-Lisp/delq (2009-01-06 08 12 39) Emacs-Lisp/delete (2009-01-06 08 25 58) Emacs-Lisp/memq (2009-01-06 08 26 23) Emacs-Lisp/mapcar (2009-01-06 23 01 56) Emacs-Lisp/japanese-hankaku (2009-01-06 23 05 12) Emacs-Lisp/append (2009-01-08 07 58 47) Emacs-Lisp/concat (2009-01-08 07 59 40) Emacs-Lisp/case-fold-search (2009-01-09 06 03 20) Emacs-Lisp/case-replace (2009-01-09 06 07 00) Emacs-Lisp/nconc (2009-01-09 06 24 06) Emacs-Lisp/defsubst (2009-01-10 14 01 04) Emacs-Lisp/car-safe (2009-01-10 14 13 52) Emacs-Lisp/dolist (2014-05-26 17 44 58)
https://w.atwiki.jp/nalu/pages/10.html
emacsメモ ※Cはctrキー、MはAltキー(環境によってはEscキー) ※emacs ファイル名 ファイル名 で複数のファイルを同時に開く事ができる <検索とか> 検索(前方)C-s 検索(後方)C-r 置換M-% 置換中に y 置換して次へ移動 n 置換せずに次へ移動 ! 以降確認無しで置換 q 終了 一括置換M-x replace-string 範囲指定C-space コピーM-w ペーストC-y <ファイル操作> 上書き保存C-x C-s ファイル名を指定して開くC-x C-f <特殊操作> 現在実行中の操作の中止C-g Emacs一時停止Ctrl+z コマンド4回実行Ctrl+u コマンドを数字の分だけ実行Esc- 数字 UndoCtrl+x u emacsの終了C-x C-c <カーソル操作> ↑C-p ↓C-n →C-f ←C-b 行の先頭に移動C-a 行の末尾に移動C-e 次の単語に移動M-f 前の単語に移動M-b 段落の先頭に移動M-a 段落の末尾に移動M-e 一画面分下に移動C-v 一画面分上に移動M-v ファイルの先頭に移動M- ファイルの最後に移動M- カーソルが中央になるように画面を調整C-l ばっくすぺーす BS カーソルから一文字削除C-d カーソル位置の行削除C-k カーソル左の単語削除C- BS カーソル位置の単語削除M-d <ウィンドウ操作> ウィンドウの消去Ctrl+x 0 ウィンドウを全画面表示Ctrl+x 1 ウィンドウを上下に2分割Ctrl+x 2 ウィンドウを左右に2分割Ctrl+x 3 カーソルを次のウィンドウへ移動Ctrl+x o <grep> grep M-x grep <コンパイル> コンパイル M-x compile <チュートリアル> チュートリアル M-x help-with-tutorial <バッファ> バッファの表示 M-x M-b バッファの選択 M-x b バッファの削除 バッファを表示して削除したいバッファの行でd
https://w.atwiki.jp/shunbo/pages/29.html
Emacsキーバインド覚書き 起動 % emacs 終了 C-x C-c ファイル操作 C-x C-f ファイルを開く C-x C-s ファイルを保存 ウィンドウ分割 C-x 2 2行に分割 C-x 3 2列に分割 C-x 0 カーソルがある方の分割したウィンドウを閉じる C-x 1 カーソルのない方の分割したウィンドウを閉じる C-x 5 2 もう一つのemacsウィンドウを立ち上げる(けっこう使う) shellの起動 M-x shell emacs上でshellを起動する exit shell起動して、exitで終了
https://w.atwiki.jp/wiki6_takt/pages/57.html
;; .emacs ;; WEB+DB40 ;;;; -*- mode lisp-interaction; syntax elisp; coding utf-8-unix -*- ;; ~/elisp をライブラリパスに追加 (setq load-path (append (list (expand-file-name "~/elisp/") ) load-path)) ;; locale (UTF-8) (set-language-environment "Japanese") (set-terminal-coding-system utf-8) (set-keyboard-coding-system utf-8) (set-buffer-file-coding-system utf-8) (setq default-buffer-file-coding-system utf-8) ;; フォントロックモード (強調表示等) を有効にする (global-font-lock-mode t) ;; 一時マークモードの自動有効化 (setq-default transient-mark-mode t) ;; C-x C-u が何もしないように変更する (undo の typo 時誤動作防止) (global-unset-key "\C-x\C-u") ;; 括弧の対応をハイライト. (show-paren-mode 1) ;; バッファ末尾に余計な改行コードを防ぐための設定 (setq next-line-add-newlines nil) ;; default to better frame titles (setq frame-title-format (concat "%b - emacs@" system-name)) ;; C-x l で goto-line を実行 (define-key ctl-x-map "l" goto-line) ;; 時間を表示 (display-time) ;; 列数表示 (column-number-mode 1) ;; メニューバーを消す (menu-bar-mode -1) ;; C-h でカーソルの左にある文字を消す (define-key global-map "\C-h" delete-backward-char) ;; C-h に割り当てられている関数 help-command を C-x C-h に割り当てる (define-key global-map "\C-x\C-h" help-command) ;; C-o に動的略語展開機能を割り当てる (define-key global-map "\C-o" dabbrev-expand) ;; 大文字小文字を区別 (setq dabbrev-case-fold-search nil) ;; 日本語・英語混じり文での区切判定 ;; http //www.alles.or.jp/~torutk/oojava/meadow/Meadow210Install.html (defadvice dabbrev-expand (around modify-regexp-for-japanese activate compile) "Modify `dabbrev-abbrev-char-regexp dynamically for Japanese words." (if (bobp) ad-do-it (let ((dabbrev-abbrev-char-regexp (let ((c (char-category-set (char-before)))) (cond ((aref c ?a) "[-_A-Za-z0-9]") ; ASCII ((aref c ?j) ; Japanese (cond ((aref c ?K) "\\cK") ; katakana ((aref c ?A) "\\cA") ; 2byte alphanumeric ((aref c ?H) "\\cH") ; hiragana ((aref c ?C) "\\cC") ; kanji (t "\\cj"))) ((aref c ?k) "\\ck") ; hankaku-kana ((aref c ?r) "\\cr") ; Japanese roman ? (t dabbrev-abbrev-char-regexp))))) ad-do-it))) ;; BS で選択範囲を消す (delete-selection-mode 1) ;; The local variables list in .emacs と言われるのを抑止 (add-to-list ignored-local-variables syntax) ;; ruby-mode の設定 (autoload ruby-mode "ruby-mode" "Mode for editing ruby source files" t) (setq auto-mode-alist (append (("\\.rb$" . ruby-mode)) auto-mode-alist)) (setq interpreter-mode-alist (append (("ruby" . ruby-mode)) interpreter-mode-alist)) (autoload run-ruby "inf-ruby" "Run an inferior Ruby process") (autoload inf-ruby-keys "inf-ruby" "Set local key defs for inf-ruby in ruby-mode") (add-hook ruby-mode-hook (lambda () (inf-ruby-keys))) ;; cperl-mode の設定 (autoload perl-mode "cperl-mode" "alternate mode for editing Perl programs" t) (setq cperl-auto-newline t) (setq cperl-indent-parens-as-block t) (setq cperl-close-paren-offset -4) (setq cperl-indent-level 4) (setq cperl-label-offset -4) (setq cperl-continued-statement-offset 4) (setq cperl-highlight-variables-indiscriminately t) (add-hook cperl-mode-hook (lambda () (set-face-italic-p cperl-hash-face nil))) (add-hook cperl-mode-hook (lambda () (define-key cperl-mode-map "\C-cc" cperl-check-syntax) (setq indent-tabs-mode nil))) ;; リセットされた場合に UTF-8 に戻す ;; http //0xcc.net/blog/archives/000041.html (set-default-coding-systems utf-8)